home *** CD-ROM | disk | FTP | other *** search
/ Software Vault: The Gold Collection / Software Vault - The Gold Collection (American Databankers) (1993).ISO / cdr11 / pdox693.zip / TI482.ASC < prev    next >
Text File  |  1992-09-04  |  1KB  |  67 lines
  1.  
  2.  
  3.  
  4.  
  5.  
  6.  
  7.  
  8.   PRODUCT  :  Paradox                                NUMBER  :  482
  9.   VERSION  :  All
  10.        OS  :  DOS
  11.      DATE  :  September 4, 1992                        PAGE  :  1/1
  12.  
  13.     TITLE  :  Illustration of the MATCH() Function
  14.  
  15.  
  16.  
  17.  
  18.   This Technical Information sheet illustrates one possible use of
  19.   the PAL MATCH() function.  The script example below shows how to
  20.   use the MATCH() function to determine how many minutes have
  21.   elapsed between the start time and the end time.  The example
  22.   assumes that military time is being used.
  23.  
  24.  
  25.   ;TIME.SC
  26.  
  27.   ECHO NORMAL
  28.   EDIT "tbl"                  ; Tbl is the table being used
  29.   SCAN
  30.      x=MATCH([Start Time], "..:..:..", sh, sm, ss)
  31.      y=MATCH([End Time], "..:..:..", eh, em, es)
  32.      IF (x and y)
  33.      THEN startsec = NUMVAL(sh)*3600 + NUMVAL(sm)*60 + NUMVAL(ss)
  34.           endsec   = NUMVAL(eh)*3600 + NUMVAL(em)*60 + NUMVAL(es)
  35.           [Length of Call] = ROUND((endsec-startsec)/60,0)
  36.      ENDIF
  37.   ENDSCAN
  38.  
  39.  
  40.   For additional information on PAL, refer to the PAL Reference
  41.   Guide (for versions earlier than 4.0, refer to the PAL User's
  42.   Guide).
  43.  
  44.   DISCLAIMER: You have the right to use this technical information
  45.   subject to the terms of the No-Nonsense License Statement that
  46.   you received with the Borland product to which this information
  47.   pertains.
  48.  
  49.  
  50.  
  51.  
  52.  
  53.  
  54.  
  55.  
  56.  
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.  
  64.  
  65.  
  66.  
  67.